(XTread_socket): Use lw_tookit_related_event_p to avoid sending

toolkit-specific events to Emacs.

diff --git a/src/xterm.c b/src/xterm.c
index 49dd9fe164b1613762999bb9c12f4a8a533d41c4..27e99ca3726eaccee4c666ca22a9a0536cdbd913 100644 (file)
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -3651,6 +3651,13 @@ XTread_socket (sd, bufp, numchars, waitp, expected)
                                          80, &keysym, &compose_status);
 #endif
 
+#ifdef USE_X_TOOLKIT
+                  if (lw_toolkit_related_event_p (&event))
+                    {
+                      XtDispatchEvent (&event);
+                      break;
+                    }
+#endif
                  orig_keysym = keysym;
 
                  if (numchars > 1)